(pmail-reply-callback): Call pmail-show-message to repaint the

message, insuring that new headers, like X-BABYL-V6... are correctly
hidden.

diff --git a/lisp/mail/pmail.el b/lisp/mail/pmail.el
index 72abe896fbc1f2a2c7ffedc9d6dd8d6174b79453..cfa6c3f95ad7abfaca1ca68216e7170dbecea1e3 100644 (file)
--- a/lisp/mail/pmail.el
+++ b/lisp/mail/pmail.el
@@ -2782,7 +2782,8 @@ non-nil, otherwise clears it.  N is the message number.
 BUFFER, possibly narrowed, contains an mbox mail message."
   (save-excursion
     (set-buffer buffer)
-    (pmail-set-attribute attr state n)))
+    (pmail-set-attribute attr state n)
+    (pmail-show-message)))
 
 (defun pmail-mark-message (msgnum-list attr-index)
   "Set attribute ATTRIBUTE-INDEX in the message of the car of MSGNUM-LIST.